home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / newsgroups / misc.20020314-20021006 / 000328_fdc@columbia.edu_Thu Aug 29 12:06:56 EDT 2002.msg < prev    next >
Text File  |  2020-01-01  |  3KB  |  105 lines
  1. Article: 13658 of comp.protocols.kermit.misc
  2. Path: newsmaster.cc.columbia.edu!news.columbia.edu!news-not-for-mail
  3. From: fdc@columbia.edu (Frank da Cruz)
  4. Newsgroups: comp.protocols.kermit.misc
  5. Subject: Re: scripting capturing of Cisco ARP tables
  6. Date: 29 Aug 2002 12:06:47 -0400
  7. Organization: Columbia University
  8. Lines: 88
  9. Message-ID: <aklgqn$2gv$1@watsol.cc.columbia.edu>
  10. References: <3d6e39ea@yorrell.saard.net>
  11. NNTP-Posting-Host: watsol.cc.columbia.edu
  12. X-Trace: newsmaster.cc.columbia.edu 1030637208 6787 128.59.39.139 (29 Aug 2002 16:06:48 GMT)
  13. X-Complaints-To: postmaster@columbia.edu
  14. NNTP-Posting-Date: 29 Aug 2002 16:06:48 GMT
  15. Xref: newsmaster.cc.columbia.edu comp.protocols.kermit.misc:13658
  16.  
  17. In article <3d6e39ea@yorrell.saard.net>,
  18. Arthur Marsh  <arthur.marsh@adelaide.edu.au> wrote:
  19. : Hi, I've been out of practice with writing Kermit scripts and want to do 
  20. : the following:
  21. : 
  22. : Given one series of IP addresses:
  23. : 
  24. Put them in an array, loop thru the array, e.g.:
  25.  
  26.   dcl \&a[] = 123.456.789.001 123.456.789.002 123.456.789.003 123.456.789.004
  27.   for \%i 1 \fdim(&a) 1 {
  28.       ...
  29.   }
  30.  
  31. Or read the addresses into the array from a file, whatever.  For more
  32. about arrays, see the book and:
  33.  
  34.   http://www.columbia.edu/kermit/ckermit70.html#x7.10
  35.  
  36. For file i/o, see:
  37.  
  38.   http://www.columbia.edu/kermit/ckermit70.html#x1.22
  39.  
  40. : telnet to each IP address in turn,
  41. : 
  42. set host \&a[\%i]
  43. if fail ...
  44.  
  45. : send a:
  46. : 
  47. : show arp
  48. : 
  49. : command
  50. : 
  51. : and send a space character as long as a "More" prompt appears
  52. : 
  53. : For each line that starts with "Internet", log the 4th and 2nd space 
  54. : delimited string to a file.
  55. : 
  56. Something like this:
  57.  
  58.   fopen /write \%c outfile
  59.   if fail ...
  60.  
  61.   lineout show arp              ; Send "show arp" and CR
  62.   set flag on                   ; Loop control
  63.   while flag {                  ; Loop
  64.       clear input               ; Clear INPUT buffer
  65.       minput 10 "\10" "More?" "Prompt>"  ; Wait for trigger strings
  66.       if fail break
  67.       switch \v(minput) {
  68.         :1, if equal "\fleft(\v(input),8)" "Internet" {
  69.             fwrite \%c \v(input)
  70.             }
  71.             break
  72.         :2, output " "
  73.             break
  74.         :3, set flag off
  75.       }
  76.   }
  77.  
  78. Here you need to get the exact syntax of the More prompt and the 
  79. Cisco shell prompt.
  80.  
  81. Maybe each Cisco box has a different shell prompt.  Then you need parallel
  82. arrays for the IP addresses and the shell prompts.  See the "mpservers"
  83. sample script in the C-Kermit / K95 Script library:
  84.  
  85.   http://www.columbia.edu/kermit/ckscripts.html
  86.  
  87. : There are a couple of variations.
  88. : 
  89. : One device needs to be sent the comand
  90. : 
  91. : session 15 <cr>
  92. : 
  93. : after the initial log-in and before the "show arp" command.
  94. : 
  95. : Some devices need
  96. : 
  97. : session 15 <cr>
  98. : 
  99. : followed by a second username/password (identical to the first)
  100. : after the initial log-in and before the "show arp" command.
  101. : 
  102. Use a SWITCH statement on the hostname/address.
  103.  
  104. - Frank
  105.